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function PageHistory_setPageFlag(name, flag) { 

//variable used in the cookie: literal string with ' to escape the potential : inside of name 
10 var namelit = ''" + name + ""; 

//set it in the cookie string 

//case in it is in pages already, then modify value in cookie 
if (ithis.isNotlnHistory(name)) { 

var repl = new RegExp(namelit + ":" + "[ A \\s]*\\s"); 
15 debug(GenDebug, "this.cookie before", this.cookie); 

debug(GenDebug, "repl", repl); 

this.cookie = this.cookie.replace(repl, namelit + ":" + flag + " "); 
debug(GenDebug, "this.cookie after", this.cookie); 

} 

20 else { 

//case cookie empty, create it 
if (this.cookie == "") { 
f 1 this.cookie = "{ " + namelit + ":" + flag + " }"; 

d } 

-J!5 //else add it to the beginning 

= else { 

f 7 this.cookie = "{ " + namelit + ":" + flag + " , " + this.cookie.substr(1 ); 

Ci > 

F 4 this.size++; 

jf$0 debug(GenDebug, "this.size", this.size); 

§ ^ //case size > maxsize, remove Iru = end 

s if (this.size > this.maxsize) { 

M< debug(GenDebug, "this.cookie before size restraint", this.cookie); 

fy this.cookie = this.cookie.slice(0, this.cookie.lastlndexOf(Y)) + "}"; 

C]35 debug(GenDebug, "this.cookie after size restraint", this.cookie); 

a } 1 

f i debug(GenDebug, "this.cookie end", this.cookie); 

~* //set it in the hashtable 

40 this.pages[name] = flag; 

//set the cookie 

setCookie("pageh", this.cookie); 
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linction PageHistory_getPageFlag(name) { 

if (lsDef(this.pages[name])) return this.pages[name]; 

r unction PageHistory_isNotlnHistory(name) { 

if (lsUndef(this.pages[name])) return true; 
return false; 



PageHistoryO 
Description: 
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definition of the PageHistory constructor 

The PageHistory object stores a mru/lru (most and least recently used) list of size 

maxSize pages for which you submitted a form 

When you add a page and the list is full we discard Iru and add it as mru 

Pages are characterized by a guid and a a flag 

The flag indicates if the page has already been submitted 

This object has some methods that lets you add a page, update a flag for a page 

and get a flag from a page. 

=============================================================== */ 

//no need to use prototypes since we use only one instance of the object 
function PageHistory(maxsize) { 

//define the member variables 

this.maxsize = maxsize; 

this.size = 0; 

//we store a js expression defining an associative array in the cookie 
//we instantiate the array for quick lookups in the js object pages 
//we keep the cookie to manage the Iru/mru for serialization 

//this makes the whole thing much faster: remove beginning and add to the end are very easy ops 
on strings 

//and we don't have to loop to serialize/deserialize 
this.cookie = getCookie("pageh"); 
debug(GenDebug, "this.cookie", this.cookie); 
if (this.cookie == "") { 

this.pages = new Object(); 

} 

else{ 

this.pages = evalfbozo = " + this.cookie); 
this.size = this.cookie.split(7).length; 
debug(GenDebug, "this.size", this.size); 

} 

//define the methods 

this.setPageFlag = PageHistory_setPageFlag; 
this.getPageFlag = PageHistory_getPageFlag; 
this.isNotlnHistory = PageHistoryJsNotln History; 
debug(GenDebug, "pages", dumpObject(this.pages)); 

} 

var pageHistory = new PageHistory(20); 
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allowSubmit(name) 
Description: 

5 checks if a page is allowed to be submitted. If it is allowed to do so, returns true and sets its 

flag to 0 so that it won't be allowed again. 

to be called on a onSubmit handler 

10 function a1lowSubmit(name, confirmFlag) { 
uKey = pageHistory.getPageFlag(name) 
debug(GenDebug, "uKey", uKey); 

if(uKey == "1"){ 

pageHistory.setPageF1ag(name, "0"); 

15 return true; 

} else { 

if (confirm Flag) { . 
return confirmfThis form has previously been submited. Submitting again may result in an 

error. Do you want to submit?"); 
20 }else{ . 

alert(This Form has previously been submited. It cannot be submited again."); 

return false; 

;: i5 } } 

it putPagelnHistory(name) 
SBO Description: 

I puts a page in history if it is not there, with a flag allowing it to be submitted. 

s To be called at the beginning of your page 

C85 function putPagelnHistory(name) { 

rf] debug(GenDebug, "pageHistory.isNotlnHistory(name)", pageHistory.isNotlnHistory(name)); 

f 1 if (pageHistory.isNotlnHistory(name)) { 

5 pageHistory.setPageFlag(name, "1"); 

} 

40 } 

function dumpObject(obj) { 
var dump = ""; 

for (var i in obj) dump += i + "=" + obj[i] + "\n"; 
45 return dump; 

} 
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getObjectO 

Description: convert object name string or object reference into a valid object reference 
5 for both browsers: this is a reference on which you can set some style attributes 

====================================================================== */ 

function getObject(obj) { 

var theObj; 

if (typeof obj == "string") { 
10 var iniObj; 

if (isNav6) { 

iniObj = document.getElementByld(obj); 

} 

else { 

15 iniObj = eval("document." + coll + obj); 

} 

if (lsUndef(iniObj)) { 

return "undefined"; 

20 } 

if (isNav4) { 
C3 return iniObj; 

^25 else { 

e ,i // in the IE or NS6 case the iniObj.style object may be undefined 
tl if (lsDef(iniObj. style)) { 

:~ return iniObj.style; 

^ } 

=;30 else { 

* y return "undefined"; 

: } 
^ } 

ry } 

[£5 else { 

rn theObj = obj; 

i } 

?~ return theObj; 

} 

40 
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getObjectRef() 

Description: convert object name string or object reference into a valid object reference 
for both browsers, without the style in IE: this is the real object reference 
this function is adapted from Danny Goodman's "Dynamic Html : The Definitive Reference" 
http://www.amazon.eom/exec/obidos/ASIN/1 565924940/qid%3D96301 2863/002-01 74003- 
8509633 

======================================================================*/ 

function getObjectRef(obj) {//alertfgetRef "+obj); 

var theObj; 

if (typeofobj == "string") { 

var iniObj = eval("document." + coll + obj); 
//alert("getRef"+iniObj); 

if (lsUndef(iniObj)) { 

return "undefined 1"; 

} 

return iniObj; 

} 

else{ 

theObj = obj; 
} 

return theObj; 

} 
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FUNCTION: IsUndef 



INPUT: val - the value to be tested 

5 

RETURN: true, if the value is undefined 
false, otherwise. 

PLATFORMS: Netscape Navigator 3.01 and higher, 
10 Microsoft Internet Explorer 3.02 and higher, 

Netscape Enterprise Server 3.0, 
Microsoft IIS/ASP 3.0. 



==== */ 



function lsUndef( val ) { 
15 var isValid = false; 

if (val+ nB == "undefined") 
isValid = true; 

return isValid; 
20 } //end IsUndef 

function lsDef( val ) { 
Q return MsUndef(val); 

J } // end IsUndef 

hi /** 

u * <pre> 

L = * This function 

„ : * checks if the form is allowed to be submitted, 

^lo * if yes, it sets the action, then calls form.submit() 

i y * 

3 * Usage: 

ril * <code> 

[35 * <a href= , Uavascript:submitForm(ViMM/somefile.jsp , > 'myForm', 'someUniqueKey 1 , true)"> 

H * </code> 

5 * </pre> 

40 function submitForm(action, formName, key, confirmFlag) { 

//we put a provision here to let the users of this function not provide the last argument, which the 
ndefaults to true 
if (IsUndef(confirmFlag)) { 
confirmFlag = true; 

45 } 

if (allowSubmit(key, confirmFlag)) { 

debug(GenDebug, "formName", formName); 

eval ("document." + formName + ".action=V" + action + T"); 

eval("document." + formName + n .submit()"); 

50 } 
} 
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